Top 10k strings from Microdrives Utility System (1984)(Sinclair User).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   1 standard choice input routine
   1 screen/printer for catalogue
   1 screen dump routine ver.1.2
   1 origin=7010
   1 no return needed
   1 neat catalogue                  version 1.0 31/3/84
   1 microdriveC
   1 merge routine
   1 menu of printer choices
   1 load/merge routines
   1 list to printer ver2
   1 get choice of screen file
   1 get choice
   1 f;". ";z$(
   1 f$=f$+"(screen$)"
   1 exit without erase
   1 erase a file
   1 epson screendump subroutine
   1 end of main menu
   1 end main menu routines
   1 end block delete
   1 display options
   1 choice>highest
   1 choice<lowest
   1 choice of screen files
   1 choice =3 
   1 block delete routine            Sinclair User nov 83            modified 24-3-84
   1 block delete call
   1 baud rate for printer
   1 alternative direct entry point
   1 Sheikosa/Tandy screendump routine
   1 MICRODRIVE UTILITY SYSTEM         J.B.Souter                Sinclair User oct-84-110
   1 J.B.Souter "
   1 ;"your choice:";
   1 ;"stream14z$"
   1 ;"done,press a key to continue":
   1 ;"Press a key to continue":
   1 ;"MDUS UTILITY SYSTEM 
   1 ;"Goodbye":
   1 ;"Choice of printer"
   1 ;"Choice of katalogue"
   1 ;"3> Tandy  printer"
   1 ;"3> Sheikosa  printer"
   1 ;"2> to printer"
   1 ;"2> EPSON  printer"
   1 ;"1> to screen"
   1 ;"1> ZX printer"
   1 ;" Key Option ":
   1 ''f;" files leaving ";z$(2
   1 ''"End line: ";:
   1 "Name of screen file: ";
   1 "Cartrige name:";z$(
   1 "Block delete"'"Start line; ";:
   1 "8> Exit to interpreter"''
   1 "7> Block delete lines"''
   1 "6> Erase a file"''
   1 "5> List  to printer"''
   1 "4> Screen dump to printer"''
   1 "3> Neat Catalogue"''
   1 "2> Merge Program"''
   1 "1> Load Program"''
   1 "* filename to erase:";f$
   1 "* filemane to merge:";f$
   1 "* filemane to load:";f$